home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / t3_1 / risc_src.lha / risc_sources / tman / state.tex / img8.png < prev    next >
Portable Network Graphic  |  1988-10-28  |  18KB  |  1743x308  |  4-bit (16 colors)
Labels: text | font | screenshot
OCR: This is accurate if location is a variable, but if it is a call, the subforms of the call are evaluated when the LOCATIVE- (LOCATIVE (FOO (BAR BAZ))) = (LET ((TEMP1 FOO) (TEMP2 (BAR BAZ))) (OBJECT NIL ((CONTENTS SELF) (TEMP1 TEMP2)) ((SETTER CONTENTS) SELF VALUE) (SET (TEMP1 TEMP2) VALUE)) ((LOCATIVE? SELF) T)))